Imports Castle.ActiveRecord

Namespace Model
    ''' <summary>
    '''	Gerado por MyGeneration usando o template ActiveRecord Object Mapper-1.0.3
    '''	Criado em 14/08/2010 00:29:39
    ''' </summary>
    ''' <remarks></remarks>
    <Serializable(), ActiveRecord("pagamento", DynamicUpdate:=True)> _
    Public Class Pagamento
        Inherits ActiveRecordBase(Of Pagamento)

        Private _cd_pagamento As Integer
        Private _pagamento_descricao As String
        Private _pagamento_dias As Integer


        'Private _Pessoas As IList = New ArrayList
        Private _Pessoa As Model.Pessoa

        <PrimaryKey(PrimaryKeyType.Sequence, SequenceName:="pagamento_cd_pagamento_seq")> _
        Public Property cd_pagamento() As Integer
            Get
                Return _cd_pagamento
            End Get
            Set(ByVal value As Integer)
                _cd_pagamento = value
            End Set
        End Property

        <[Property]("pagamento_descricao")> _
        Public Property pagamento_descricao() As String
            Get
                Return _pagamento_descricao
            End Get
            Set(ByVal value As String)
                _pagamento_descricao = value
            End Set
        End Property

        <[Property]("pagamento_dias")> _
        Public Property pagamento_dias() As Integer
            Get
                Return _pagamento_dias
            End Get
            Set(ByVal value As Integer)
                _pagamento_dias = value
            End Set
        End Property

        '<HasMany(GetType(Model.Pessoa), Table:="pessoa", ColumnKey:="cd_pagamento", Inverse:=True)> _
        'Public Property Pessoa() As IList
        '    Get
        '        Return _Pessoas
        '    End Get
        '    Set(ByVal value As IList)
        '        _Pessoas = value
        '    End Set
        'End Property

        <OneToOne()> _
        Public Property Pessoa() As Model.Pessoa
            Get
                Return _Pessoa
            End Get
            Set(ByVal value As Model.Pessoa)
                _Pessoa = value
            End Set
        End Property
    End Class
End Namespace